home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 242 / 242.d81 / warning bell (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  150b  |  6 lines
  1. 8810 s=54272:forl=0to24:pokes+l,0:next
  2. 8820 pokes+1,68:pokes+5,9:pokes+24,15
  3. 8830 forx=1to10:pokes+4,17:fory=1to500:next:pokes+4,20:next
  4. 8840 pokes+4,21:getq$:pokes+4,20:ifq$=""then8840
  5. 8850 pokes+24,0
  6.